e04ucf_confun User Supplied Function Description

             [NAGWare Gateway Generator]

Copyright (c) 1993 by the Numerical Algorithms Group Ltd

confun

mode                                  integer
ncnln                                 integer
n                                     integer
nrowj                                 integer
needc (ncnln)                         integer
x (n)                                 real
c (ncnln)                             real
cjac (nrowj,n)                        real
nstate                                integer

[mode,c,cjac] = confun(mode,ncnln,n,nrowj,needc,x,c,cjac,nstate)


 function [mode,c,cjac] = confun(mode,ncnln,n,nrowj,needc,x,c,cjac,nstate)